/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / emacs-complete / fsf / emacs / lisp / timezone.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6b 77 7a 68 40 68 61 |piled by| kwzh@ha|
|00000020| 6c 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |l.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 54 68 75 20 | 41 75 67 20 20 34 20 32 | on Thu |Aug  4 2|
|00000040| 30 3a 34 37 3a 31 32 20 | 31 39 39 34 0a 3b 3b 3b |0:47:12 |1994.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 67 64 2f 67 | from fi|le /gd/g|
|00000060| 6e 75 2f 65 6d 61 63 73 | 2f 31 39 2e 30 2f 6c 69 |nu/emacs|/19.0/li|
|00000070| 73 70 2f 74 69 6d 65 7a | 6f 6e 65 2e 65 6c 0a 3b |sp/timez|one.el.;|
|00000080| 3b 3b 20 65 6d 61 63 73 | 20 76 65 72 73 69 6f 6e |;; emacs| version|
|00000090| 20 31 39 2e 32 35 2e 39 | 32 2e 31 2e 0a 3b 3b 3b | 19.25.9|2.1..;;;|
|000000a0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000b0| 6e 20 46 53 46 20 32 2e | 31 30 0a 3b 3b 3b 20 6f |n FSF 2.|10.;;; o|
|000000c0| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|000000d0| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|000000e0| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|000000f0| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000100| 20 69 6e 20 45 6d 61 63 | 73 20 31 38 2e 0a 0a 28 | in Emac|s 18...(|
|00000110| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000120| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000130| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000140| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000150| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000160| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|00000170| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000180| 72 73 69 6f 6e 20 22 31 | 39 22 29 29 29 0a 20 20 |rsion "1|9"))).  |
|00000190| 20 20 28 65 72 72 6f 72 | 20 22 60 2f 67 64 2f 67 |  (error| "`/gd/g|
|000001a0| 6e 75 2f 65 6d 61 63 73 | 2f 31 39 2e 30 2f 6c 69 |nu/emacs|/19.0/li|
|000001b0| 73 70 2f 74 69 6d 65 7a | 6f 6e 65 2e 65 6c 27 20 |sp/timez|one.el' |
|000001c0| 77 61 73 20 63 6f 6d 70 | 69 6c 65 64 20 66 6f 72 |was comp|iled for|
|000001d0| 20 45 6d 61 63 73 20 31 | 39 22 29 29 0a 0a 28 70 | Emacs 1|9"))..(p|
|000001e0| 72 6f 76 69 64 65 20 28 | 71 75 6f 74 65 20 74 69 |rovide (|quote ti|
|000001f0| 6d 65 7a 6f 6e 65 29 29 | 0a 28 64 65 66 76 61 72 |mezone))|.(defvar|
|00000200| 20 74 69 6d 65 7a 6f 6e | 65 2d 77 6f 72 6c 64 2d | timezon|e-world-|
|00000210| 74 69 6d 65 7a 6f 6e 65 | 73 20 28 71 75 6f 74 65 |timezone|s (quote|
|00000220| 20 28 28 22 50 53 54 22 | 20 2e 20 2d 38 30 30 29 | (("PST"| . -800)|
|00000230| 20 28 22 50 44 54 22 20 | 2e 20 2d 37 30 30 29 20 | ("PDT" |. -700) |
|00000240| 28 22 4d 53 54 22 20 2e | 20 2d 37 30 30 29 20 28 |("MST" .| -700) (|
|00000250| 22 4d 44 54 22 20 2e 20 | 2d 36 30 30 29 20 28 22 |"MDT" . |-600) ("|
|00000260| 43 53 54 22 20 2e 20 2d | 36 30 30 29 20 28 22 43 |CST" . -|600) ("C|
|00000270| 44 54 22 20 2e 20 2d 35 | 30 30 29 20 28 22 45 53 |DT" . -5|00) ("ES|
|00000280| 54 22 20 2e 20 2d 35 30 | 30 29 20 28 22 45 44 54 |T" . -50|0) ("EDT|
|00000290| 22 20 2e 20 2d 34 30 30 | 29 20 28 22 41 53 54 22 |" . -400|) ("AST"|
|000002a0| 20 2e 20 2d 34 30 30 29 | 20 28 22 4e 53 54 22 20 | . -400)| ("NST" |
|000002b0| 2e 20 2d 33 33 30 29 20 | 28 22 47 4d 54 22 20 2e |. -330) |("GMT" .|
|000002c0| 20 30 29 20 28 22 42 53 | 54 22 20 2e 20 31 30 30 | 0) ("BS|T" . 100|
|000002d0| 29 20 28 22 4d 45 54 22 | 20 2e 20 31 30 30 29 20 |) ("MET"| . 100) |
|000002e0| 28 22 45 45 54 22 20 2e | 20 32 30 30 29 20 28 22 |("EET" .| 200) ("|
|000002f0| 4a 53 54 22 20 2e 20 39 | 30 30 29 20 28 22 47 4d |JST" . 9|00) ("GM|
|00000300| 54 2b 31 22 20 2e 20 31 | 30 30 29 20 28 22 47 4d |T+1" . 1|00) ("GM|
|00000310| 54 2b 32 22 20 2e 20 32 | 30 30 29 20 28 22 47 4d |T+2" . 2|00) ("GM|
|00000320| 54 2b 33 22 20 2e 20 33 | 30 30 29 20 28 22 47 4d |T+3" . 3|00) ("GM|
|00000330| 54 2b 34 22 20 2e 20 34 | 30 30 29 20 28 22 47 4d |T+4" . 4|00) ("GM|
|00000340| 54 2b 35 22 20 2e 20 35 | 30 30 29 20 28 22 47 4d |T+5" . 5|00) ("GM|
|00000350| 54 2b 36 22 20 2e 20 36 | 30 30 29 20 28 22 47 4d |T+6" . 6|00) ("GM|
|00000360| 54 2b 37 22 20 2e 20 37 | 30 30 29 20 28 22 47 4d |T+7" . 7|00) ("GM|
|00000370| 54 2b 38 22 20 2e 20 38 | 30 30 29 20 28 22 47 4d |T+8" . 8|00) ("GM|
|00000380| 54 2b 39 22 20 2e 20 39 | 30 30 29 20 28 22 47 4d |T+9" . 9|00) ("GM|
|00000390| 54 2b 31 30 22 20 2e 20 | 31 30 30 30 29 20 28 22 |T+10" . |1000) ("|
|000003a0| 47 4d 54 2b 31 31 22 20 | 2e 20 31 31 30 30 29 20 |GMT+11" |. 1100) |
|000003b0| 28 22 47 4d 54 2b 31 32 | 22 20 2e 20 31 32 30 30 |("GMT+12|" . 1200|
|000003c0| 29 20 28 22 47 4d 54 2b | 31 33 22 20 2e 20 31 33 |) ("GMT+|13" . 13|
|000003d0| 30 30 29 20 28 22 47 4d | 54 2d 31 22 20 2e 20 2d |00) ("GM|T-1" . -|
|000003e0| 31 30 30 29 20 28 22 47 | 4d 54 2d 32 22 20 2e 20 |100) ("G|MT-2" . |
|000003f0| 2d 32 30 30 29 20 28 22 | 47 4d 54 2d 33 22 20 2e |-200) ("|GMT-3" .|
|00000400| 20 2d 33 30 30 29 20 28 | 22 47 4d 54 2d 34 22 20 | -300) (|"GMT-4" |
|00000410| 2e 20 2d 34 30 30 29 20 | 28 22 47 4d 54 2d 35 22 |. -400) |("GMT-5"|
|00000420| 20 2e 20 2d 35 30 30 29 | 20 28 22 47 4d 54 2d 36 | . -500)| ("GMT-6|
|00000430| 22 20 2e 20 2d 36 30 30 | 29 20 28 22 47 4d 54 2d |" . -600|) ("GMT-|
|00000440| 37 22 20 2e 20 2d 37 30 | 30 29 20 28 22 47 4d 54 |7" . -70|0) ("GMT|
|00000450| 2d 38 22 20 2e 20 2d 38 | 30 30 29 20 28 22 47 4d |-8" . -8|00) ("GM|
|00000460| 54 2d 39 22 20 2e 20 2d | 39 30 30 29 20 28 22 47 |T-9" . -|900) ("G|
|00000470| 4d 54 2d 31 30 22 20 2e | 20 2d 31 30 30 30 29 20 |MT-10" .| -1000) |
|00000480| 28 22 47 4d 54 2d 31 31 | 22 20 2e 20 2d 31 31 30 |("GMT-11|" . -110|
|00000490| 30 29 20 28 22 47 4d 54 | 2d 31 32 22 20 2e 20 2d |0) ("GMT|-12" . -|
|000004a0| 31 32 30 30 29 29 29 20 | 22 5c 0a 2a 54 69 6d 65 |1200))) |"\.*Time|
|000004b0| 20 64 69 66 66 65 72 65 | 6e 74 69 61 6c 73 20 6f | differe|ntials o|
|000004c0| 66 20 74 69 6d 65 7a 6f | 6e 65 20 66 72 6f 6d 20 |f timezo|ne from |
|000004d0| 47 4d 54 20 69 6e 20 2b | 2d 48 48 4d 4d 20 66 6f |GMT in +|-HHMM fo|
|000004e0| 72 6d 2e 0a 54 68 69 73 | 20 6c 69 73 74 20 69 73 |rm..This| list is|
|000004f0| 20 6f 62 73 6f 6c 65 73 | 63 65 6e 74 2c 20 61 6e | obsoles|cent, an|
|00000500| 64 20 69 73 20 70 72 65 | 73 65 6e 74 20 6f 6e 6c |d is pre|sent onl|
|00000510| 79 20 66 6f 72 20 62 61 | 63 6b 77 61 72 64 73 20 |y for ba|ckwards |
|00000520| 63 6f 6d 70 61 74 69 62 | 69 6c 69 74 79 2c 0a 62 |compatib|ility,.b|
|00000530| 65 63 61 75 73 65 20 74 | 69 6d 65 20 7a 6f 6e 65 |ecause t|ime zone|
|00000540| 20 6e 61 6d 65 73 20 61 | 72 65 20 61 6d 62 69 67 | names a|re ambig|
|00000550| 75 6f 75 73 20 69 6e 20 | 70 72 61 63 74 69 63 65 |uous in |practice|
|00000560| 2e 0a 55 73 65 20 60 63 | 75 72 72 65 6e 74 2d 74 |..Use `c|urrent-t|
|00000570| 69 6d 65 2d 7a 6f 6e 65 | 27 20 69 6e 73 74 65 61 |ime-zone|' instea|
|00000580| 64 2e 22 29 0a 28 64 65 | 66 76 61 72 20 74 69 6d |d.").(de|fvar tim|
|00000590| 65 7a 6f 6e 65 2d 6d 6f | 6e 74 68 73 2d 61 73 73 |ezone-mo|nths-ass|
|000005a0| 6f 63 20 28 71 75 6f 74 | 65 20 28 28 22 4a 41 4e |oc (quot|e (("JAN|
|000005b0| 22 20 2e 20 31 29 20 28 | 22 46 45 42 22 20 2e 20 |" . 1) (|"FEB" . |
|000005c0| 32 29 20 28 22 4d 41 52 | 22 20 2e 20 33 29 20 28 |2) ("MAR|" . 3) (|
|000005d0| 22 41 50 52 22 20 2e 20 | 34 29 20 28 22 4d 41 59 |"APR" . |4) ("MAY|
|000005e0| 22 20 2e 20 35 29 20 28 | 22 4a 55 4e 22 20 2e 20 |" . 5) (|"JUN" . |
|000005f0| 36 29 20 28 22 4a 55 4c | 22 20 2e 20 37 29 20 28 |6) ("JUL|" . 7) (|
|00000600| 22 41 55 47 22 20 2e 20 | 38 29 20 28 22 53 45 50 |"AUG" . |8) ("SEP|
|00000610| 22 20 2e 20 39 29 20 28 | 22 4f 43 54 22 20 2e 20 |" . 9) (|"OCT" . |
|00000620| 31 30 29 20 28 22 4e 4f | 56 22 20 2e 20 31 31 29 |10) ("NO|V" . 11)|
|00000630| 20 28 22 44 45 43 22 20 | 2e 20 31 32 29 29 29 20 | ("DEC" |. 12))) |
|00000640| 22 5c 0a 41 6c 69 73 74 | 20 6f 66 20 66 69 72 73 |"\.Alist| of firs|
|00000650| 74 20 74 68 72 65 65 20 | 6c 65 74 74 65 72 73 20 |t three |letters |
|00000660| 6f 66 20 61 20 6d 6f 6e | 74 68 20 61 6e 64 20 69 |of a mon|th and i|
|00000670| 74 73 20 6e 75 6d 65 72 | 69 63 61 6c 20 72 65 70 |ts numer|ical rep|
|00000680| 72 65 73 65 6e 74 61 74 | 69 6f 6e 2e 22 29 0a 28 |resentat|ion.").(|
|00000690| 64 65 66 61 6c 69 61 73 | 20 27 74 69 6d 65 7a 6f |defalias| 'timezo|
|000006a0| 6e 65 2d 6d 61 6b 65 2d | 64 61 74 65 2d 61 72 70 |ne-make-|date-arp|
|000006b0| 61 2d 73 74 61 6e 64 61 | 72 64 20 23 5b 28 64 61 |a-standa|rd #[(da|
|000006c0| 74 65 20 26 6f 70 74 69 | 6f 6e 61 6c 20 6c 6f 63 |te &opti|onal loc|
|000006d0| 61 6c 20 74 69 6d 65 7a | 6f 6e 65 29 20 22 c0 09 |al timez|one) "..|
|000006e0| 5c 6e 0b 23 1c c5 5c 66 | c6 48 5c 66 c7 48 5c 66 |\n.#..\f|.H\f.H\f|
|000006f0| c8 48 c9 5c 66 ca 48 5c | 66 cb 48 5c 66 cc 48 23 |.H.\f.H\|f.H\f.H#|
|00000700| 5c 66 cd 48 25 29 87 22 | 20 5b 74 69 6d 65 7a 6f |\f.H%)."| [timezo|
|00000710| 6e 65 2d 66 69 78 2d 74 | 69 6d 65 20 64 61 74 65 |ne-fix-t|ime date|
|00000720| 20 6c 6f 63 61 6c 20 74 | 69 6d 65 7a 6f 6e 65 20 | local t|imezone |
|00000730| 6e 65 77 20 74 69 6d 65 | 7a 6f 6e 65 2d 6d 61 6b |new time|zone-mak|
|00000740| 65 2d 61 72 70 61 2d 64 | 61 74 65 20 30 20 31 20 |e-arpa-d|ate 0 1 |
|00000750| 32 20 74 69 6d 65 7a 6f | 6e 65 2d 6d 61 6b 65 2d |2 timezo|ne-make-|
|00000760| 74 69 6d 65 2d 73 74 72 | 69 6e 67 20 33 20 34 20 |time-str|ing 3 4 |
|00000770| 35 20 36 5d 20 39 20 22 | 5c 0a 43 6f 6e 76 65 72 |5 6] 9 "|\.Conver|
|00000780| 74 20 44 41 54 45 20 74 | 6f 20 61 6e 20 61 72 70 |t DATE t|o an arp|
|00000790| 61 6e 65 74 20 73 74 61 | 6e 64 61 72 64 20 64 61 |anet sta|ndard da|
|000007a0| 74 65 2e 0a 4f 70 74 69 | 6f 6e 61 6c 20 31 73 74 |te..Opti|onal 1st|
|000007b0| 20 61 72 67 75 6d 65 6e | 74 20 4c 4f 43 41 4c 20 | argumen|t LOCAL |
|000007c0| 73 70 65 63 69 66 69 65 | 73 20 74 68 65 20 64 65 |specifie|s the de|
|000007d0| 66 61 75 6c 74 20 6c 6f | 63 61 6c 20 74 69 6d 65 |fault lo|cal time|
|000007e0| 7a 6f 6e 65 20 6f 66 20 | 74 68 65 20 44 41 54 45 |zone of |the DATE|
|000007f0| 3b 0a 69 66 20 6e 69 6c | 2c 20 47 4d 54 20 69 73 |;.if nil|, GMT is|
|00000800| 20 61 73 73 75 6d 65 64 | 2e 0a 4f 70 74 69 6f 6e | assumed|..Option|
|00000810| 61 6c 20 32 6e 64 20 61 | 72 67 75 6d 65 6e 74 20 |al 2nd a|rgument |
|00000820| 54 49 4d 45 5a 4f 4e 45 | 20 73 70 65 63 69 66 69 |TIMEZONE| specifi|
|00000830| 65 73 20 61 20 74 69 6d | 65 20 7a 6f 6e 65 20 74 |es a tim|e zone t|
|00000840| 6f 20 62 65 20 72 65 70 | 72 65 73 65 6e 74 65 64 |o be rep|resented|
|00000850| 20 69 6e 3b 0a 69 66 20 | 6e 69 6c 2c 20 74 68 65 | in;.if |nil, the|
|00000860| 20 6c 6f 63 61 6c 20 74 | 69 6d 65 20 7a 6f 6e 65 | local t|ime zone|
|00000870| 20 69 73 20 61 73 73 75 | 6d 65 64 2e 22 5d 29 0a | is assu|med."]).|
|00000880| 28 64 65 66 61 6c 69 61 | 73 20 27 74 69 6d 65 7a |(defalia|s 'timez|
|00000890| 6f 6e 65 2d 6d 61 6b 65 | 2d 64 61 74 65 2d 73 6f |one-make|-date-so|
|000008a0| 72 74 61 62 6c 65 20 23 | 5b 28 64 61 74 65 20 26 |rtable #|[(date &|
|000008b0| 6f 70 74 69 6f 6e 61 6c | 20 6c 6f 63 61 6c 20 74 |optional| local t|
|000008c0| 69 6d 65 7a 6f 6e 65 29 | 20 22 c0 09 5c 6e 0b 23 |imezone)| "..\n.#|
|000008d0| 1c c5 5c 66 c6 48 5c 66 | c7 48 5c 66 c8 48 c9 5c |..\f.H\f|.H\f.H.\|
|000008e0| 66 ca 48 5c 66 cb 48 5c | 66 cc 48 23 24 29 87 22 |f.H\f.H\|f.H#$)."|
|000008f0| 20 5b 74 69 6d 65 7a 6f | 6e 65 2d 66 69 78 2d 74 | [timezo|ne-fix-t|
|00000900| 69 6d 65 20 64 61 74 65 | 20 6c 6f 63 61 6c 20 74 |ime date| local t|
|00000910| 69 6d 65 7a 6f 6e 65 20 | 6e 65 77 20 74 69 6d 65 |imezone |new time|
|00000920| 7a 6f 6e 65 2d 6d 61 6b | 65 2d 73 6f 72 74 61 62 |zone-mak|e-sortab|
|00000930| 6c 65 2d 64 61 74 65 20 | 30 20 31 20 32 20 74 69 |le-date |0 1 2 ti|
|00000940| 6d 65 7a 6f 6e 65 2d 6d | 61 6b 65 2d 74 69 6d 65 |mezone-m|ake-time|
|00000950| 2d 73 74 72 69 6e 67 20 | 33 20 34 20 35 5d 20 39 |-string |3 4 5] 9|
|00000960| 20 22 5c 0a 43 6f 6e 76 | 65 72 74 20 44 41 54 45 | "\.Conv|ert DATE|
|00000970| 20 74 6f 20 61 20 73 6f | 72 74 61 62 6c 65 20 64 | to a so|rtable d|
|00000980| 61 74 65 20 73 74 72 69 | 6e 67 2e 0a 4f 70 74 69 |ate stri|ng..Opti|
|00000990| 6f 6e 61 6c 20 31 73 74 | 20 61 72 67 75 6d 65 6e |onal 1st| argumen|
|000009a0| 74 20 4c 4f 43 41 4c 20 | 73 70 65 63 69 66 69 65 |t LOCAL |specifie|
|000009b0| 73 20 74 68 65 20 64 65 | 66 61 75 6c 74 20 6c 6f |s the de|fault lo|
|000009c0| 63 61 6c 20 74 69 6d 65 | 7a 6f 6e 65 20 6f 66 20 |cal time|zone of |
|000009d0| 74 68 65 20 44 41 54 45 | 3b 0a 69 66 20 6e 69 6c |the DATE|;.if nil|
|000009e0| 2c 20 47 4d 54 20 69 73 | 20 61 73 73 75 6d 65 64 |, GMT is| assumed|
|000009f0| 2e 0a 4f 70 74 69 6f 6e | 61 6c 20 32 6e 64 20 61 |..Option|al 2nd a|
|00000a00| 72 67 75 6d 65 6e 74 20 | 54 49 4d 45 5a 4f 4e 45 |rgument |TIMEZONE|
|00000a10| 20 73 70 65 63 69 66 69 | 65 73 20 61 20 74 69 6d | specifi|es a tim|
|00000a20| 65 7a 6f 6e 65 20 74 6f | 20 62 65 20 72 65 70 72 |ezone to| be repr|
|00000a30| 65 73 65 6e 74 65 64 20 | 69 6e 3b 0a 69 66 20 6e |esented |in;.if n|
|00000a40| 69 6c 2c 20 74 68 65 20 | 6c 6f 63 61 6c 20 74 69 |il, the |local ti|
|00000a50| 6d 65 20 7a 6f 6e 65 20 | 69 73 20 61 73 73 75 6d |me zone |is assum|
|00000a60| 65 64 2e 22 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |ed."]).(|defalias|
|00000a70| 20 27 74 69 6d 65 7a 6f | 6e 65 2d 6d 61 6b 65 2d | 'timezo|ne-make-|
|00000a80| 61 72 70 61 2d 64 61 74 | 65 20 23 5b 28 79 65 61 |arpa-dat|e #[(yea|
|00000a90| 72 20 6d 6f 6e 74 68 20 | 64 61 79 20 74 69 6d 65 |r month |day time|
|00000aa0| 20 26 6f 70 74 69 6f 6e | 61 6c 20 74 69 6d 65 7a | &option|al timez|
|00000ab0| 6f 6e 65 29 20 22 08 3c | 83 2e 00 c1 08 21 89 1a |one) ".<|.....!..|
|00000ac0| c3 57 83 14 00 5c 6e 5b | 82 15 00 5c 6e 1c c5 c6 |.W...\n[|...\n...|
|00000ad0| 5c 6e c3 57 83 5c 22 00 | c7 82 23 00 c8 5c 66 c9 |\n.W.\".|..#..\f.|
|00000ae0| a5 5c 66 c9 a6 24 2a 82 | 2f 00 08 1e 5c 6e c5 cb |.\f..$*.|/...\n..|
|00000af0| 0e 5c 66 cd ce 0e 0f 0e | 10 5c 22 40 21 0e 11 0e |.\f.....|.\"@!...|
|00000b00| 12 0e 5c 6e 26 06 29 87 | 22 20 5b 74 69 6d 65 7a |..\n&.).|" [timez|
|00000b10| 6f 6e 65 20 74 69 6d 65 | 7a 6f 6e 65 2d 7a 6f 6e |one time|zone-zon|
|00000b20| 65 2d 74 6f 2d 6d 69 6e | 75 74 65 20 6d 20 30 20 |e-to-min|ute m 0 |
|00000b30| 61 62 73 6d 20 66 6f 72 | 6d 61 74 20 22 25 63 25 |absm for|mat "%c%|
|00000b40| 30 32 64 25 30 32 64 22 | 20 34 35 20 34 33 20 36 |02d%02d"| 45 43 6|
|00000b50| 30 20 7a 6f 6e 65 20 22 | 25 30 32 64 20 25 73 20 |0 zone "|%02d %s |
|00000b60| 25 30 34 64 20 25 73 20 | 25 73 22 20 64 61 79 20 |%04d %s |%s" day |
|00000b70| 63 61 70 69 74 61 6c 69 | 7a 65 20 72 61 73 73 71 |capitali|ze rassq|
|00000b80| 20 6d 6f 6e 74 68 20 74 | 69 6d 65 7a 6f 6e 65 2d | month t|imezone-|
|00000b90| 6d 6f 6e 74 68 73 2d 61 | 73 73 6f 63 20 79 65 61 |months-a|ssoc yea|
|00000ba0| 72 20 74 69 6d 65 5d 20 | 38 20 22 5c 0a 4d 61 6b |r time] |8 "\.Mak|
|00000bb0| 65 20 61 72 70 61 6e 65 | 74 20 73 74 61 6e 64 61 |e arpane|t standa|
|00000bc0| 72 64 20 64 61 74 65 20 | 73 74 72 69 6e 67 20 66 |rd date |string f|
|00000bd0| 72 6f 6d 20 59 45 41 52 | 2c 20 4d 4f 4e 54 48 2c |rom YEAR|, MONTH,|
|00000be0| 20 44 41 59 2c 20 61 6e | 64 20 54 49 4d 45 2e 0a | DAY, an|d TIME..|
|00000bf0| 4f 70 74 69 6f 6e 61 6c | 20 61 72 67 75 6d 65 6e |Optional| argumen|
|00000c00| 74 20 54 49 4d 45 5a 4f | 4e 45 20 73 70 65 63 69 |t TIMEZO|NE speci|
|00000c10| 66 69 65 73 20 61 20 74 | 69 6d 65 20 7a 6f 6e 65 |fies a t|ime zone|
|00000c20| 2e 22 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |."]).(de|falias '|
|00000c30| 74 69 6d 65 7a 6f 6e 65 | 2d 6d 61 6b 65 2d 73 6f |timezone|-make-so|
|00000c40| 72 74 61 62 6c 65 2d 64 | 61 74 65 20 23 5b 28 79 |rtable-d|ate #[(y|
|00000c50| 65 61 72 20 6d 6f 6e 74 | 68 20 64 61 79 20 74 69 |ear mont|h day ti|
|00000c60| 6d 65 29 20 22 c0 c1 5c | 6e 0b 5c 66 0d 25 87 22 |me) "..\|n.\f.%."|
|00000c70| 20 5b 66 6f 72 6d 61 74 | 20 22 25 34 64 25 30 32 | [format| "%4d%02|
|00000c80| 64 25 30 32 64 25 73 22 | 20 79 65 61 72 20 6d 6f |d%02d%s"| year mo|
|00000c90| 6e 74 68 20 64 61 79 20 | 74 69 6d 65 5d 20 36 20 |nth day |time] 6 |
|00000ca0| 22 5c 0a 4d 61 6b 65 20 | 73 6f 72 74 61 62 6c 65 |"\.Make |sortable|
|00000cb0| 20 64 61 74 65 20 73 74 | 72 69 6e 67 20 66 72 6f | date st|ring fro|
|00000cc0| 6d 20 59 45 41 52 2c 20 | 4d 4f 4e 54 48 2c 20 44 |m YEAR, |MONTH, D|
|00000cd0| 41 59 2c 20 61 6e 64 20 | 54 49 4d 45 2e 22 5d 29 |AY, and |TIME."])|
|00000ce0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 74 69 6d 65 |.(defali|as 'time|
|00000cf0| 7a 6f 6e 65 2d 6d 61 6b | 65 2d 74 69 6d 65 2d 73 |zone-mak|e-time-s|
|00000d00| 74 72 69 6e 67 20 23 5b | 28 68 6f 75 72 20 6d 69 |tring #[|(hour mi|
|00000d10| 6e 75 74 65 20 73 65 63 | 6f 6e 64 29 20 22 c0 c1 |nute sec|ond) "..|
|00000d20| 5c 6e 0b 5c 66 24 87 22 | 20 5b 66 6f 72 6d 61 74 |\n.\f$."| [format|
|00000d30| 20 22 25 30 32 64 3a 25 | 30 32 64 3a 25 30 32 64 | "%02d:%|02d:%02d|
|00000d40| 22 20 68 6f 75 72 20 6d | 69 6e 75 74 65 20 73 65 |" hour m|inute se|
|00000d50| 63 6f 6e 64 5d 20 35 20 | 22 5c 0a 4d 61 6b 65 20 |cond] 5 |"\.Make |
|00000d60| 74 69 6d 65 20 73 74 72 | 69 6e 67 20 66 72 6f 6d |time str|ing from|
|00000d70| 20 48 4f 55 52 2c 20 4d | 49 4e 55 54 45 2c 20 61 | HOUR, M|INUTE, a|
|00000d80| 6e 64 20 53 45 43 4f 4e | 44 2e 22 5d 29 0a 28 64 |nd SECON|D."]).(d|
|00000d90| 65 66 61 6c 69 61 73 20 | 27 74 69 6d 65 7a 6f 6e |efalias |'timezon|
|00000da0| 65 2d 70 61 72 73 65 2d | 64 61 74 65 20 23 5b 28 |e-parse-|date #[(|
|00000db0| 64 61 74 65 29 20 22 08 | 86 05 00 c1 c2 89 89 89 |date) ".|........|
|00000dc0| 89 1b 1c 1d 1e 06 1e 07 | 18 c8 c9 08 5c 22 83 28 |........|....\".(|
|00000dd0| 00 ca 16 07 cb 16 06 cc | 15 cd 14 c2 13 82 93 00 |........|........|
|00000de0| c8 ce 08 5c 22 83 3e 00 | ca 16 07 cb 16 06 cc 15 |...\".>.|........|
|00000df0| cd 14 cf 13 82 93 00 c8 | d0 08 5c 22 83 54 00 cd |........|..\".T..|
|00000e00| 16 07 cc 16 06 cb 15 ca | 14 c2 13 82 93 00 c8 d1 |........|........|
|00000e10| 08 5c 22 83 6a 00 cf 16 | 07 cc 16 06 cb 15 ca 14 |.\".j...|........|
|00000e20| cd 13 82 93 00 c8 d2 08 | 5c 22 83 80 00 ca 16 07 |........|\"......|
|00000e30| cb 16 06 cc 15 cd 14 cf | 13 82 93 00 c8 d3 08 5c |........|.......\|
|00000e40| 22 83 93 00 ca 16 07 cb | 16 06 cc 15 cd 14 c2 13 |".......|........|
|00000e50| 0e 07 83 d4 00 08 0e 07 | 94 0e 07 95 4f 89 16 07 |........|....O...|
|00000e60| 47 cd 57 83 b2 00 d4 0e | 07 d5 c2 4f 50 16 07 d6 |G.W.....|...OP...|
|00000e70| d7 08 0e 06 94 0e 06 94 | ca 5c 5c 4f 96 0e 18 5c |........|.\\O...\|
|00000e80| 22 41 21 16 06 08 0d 94 | 0d 95 4f 15 08 5c 66 94 |"A!.....|..O..\f.|
|00000e90| 5c 66 95 4f 14 0b 83 df | 00 08 0b 94 0b 95 4f 13 |\f.O....|......O.|
|00000ea0| 0e 07 83 f0 00 d9 0e 07 | 0e 06 0d 5c 66 0b 25 82 |........|...\f.%.|
|00000eb0| f7 00 d9 da 89 89 89 c2 | 25 2e 06 87 22 20 5b 64 |........|%..." [d|
|00000ec0| 61 74 65 20 22 22 20 6e | 69 6c 20 7a 6f 6e 65 20 |ate "" n|il zone |
|00000ed0| 74 69 6d 65 20 64 61 79 | 20 6d 6f 6e 74 68 20 79 |time day| month y|
|00000ee0| 65 61 72 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |ear stri|ng-match|
|00000ef0| 20 22 5c 5c 28 5b 30 2d | 39 5d 2b 5c 5c 29 5b 20 | "\\([0-|9]+\\)[ |
|00000f00| 09 5d 2b 5c 5c 28 5b 5e | 20 09 2c 5d 2b 5c 5c 29 |.]+\\([^| .,]+\\)|
|00000f10| 5b 20 09 5d 2b 5c 5c 28 | 5b 30 2d 39 5d 2b 5c 5c |[ .]+\\(|[0-9]+\\|
|00000f20| 29 5b 20 09 5d 2b 5c 5c | 28 5b 30 2d 39 5d 2b 3a |)[ .]+\\|([0-9]+:|
|00000f30| 5b 30 2d 39 3a 5d 2b 5c | 5c 29 5b 20 09 5d 2a 5c |[0-9:]+\|\)[ .]*\|
|00000f40| 5c 27 22 20 33 20 32 20 | 31 20 34 20 22 5c 5c 28 |\'" 3 2 |1 4 "\\(|
|00000f50| 5b 30 2d 39 5d 2b 5c 5c | 29 5b 20 09 5d 2b 5c 5c |[0-9]+\\|)[ .]+\\|
|00000f60| 28 5b 5e 20 09 2c 5d 2b | 5c 5c 29 5b 20 09 5d 2b |([^ .,]+|\\)[ .]+|
|00000f70| 5c 5c 28 5b 30 2d 39 5d | 2b 5c 5c 29 5b 20 09 5d |\\([0-9]|+\\)[ .]|
|00000f80| 2b 5c 5c 28 5b 30 2d 39 | 5d 2b 3a 5b 30 2d 39 3a |+\\([0-9|]+:[0-9:|
|00000f90| 5d 2b 5c 5c 29 5b 20 09 | 5d 2a 5c 5c 28 5b 2d 2b |]+\\)[ .|]*\\([-+|
|00000fa0| 61 2d 7a 41 2d 5a 30 2d | 39 5d 2b 5c 5c 29 22 20 |a-zA-Z0-|9]+\\)" |
|00000fb0| 35 20 22 5c 5c 28 5b 5e | 20 09 2c 5d 2b 5c 5c 29 |5 "\\([^| .,]+\\)|
|00000fc0| 5b 20 09 5d 2b 5c 5c 28 | 5b 30 2d 39 5d 2b 5c 5c |[ .]+\\(|[0-9]+\\|
|00000fd0| 29 5b 20 09 5d 2b 5c 5c | 28 5b 30 2d 39 5d 2b 3a |)[ .]+\\|([0-9]+:|
|00000fe0| 5b 30 2d 39 3a 5d 2b 5c | 5c 29 5b 20 09 5d 2b 5c |[0-9:]+\|\)[ .]+\|
|00000ff0| 5c 28 5b 30 2d 39 5d 2b | 5c 5c 29 22 20 22 5c 5c |\([0-9]+|\\)" "\\|
|00001000| 28 5b 5e 20 09 2c 5d 2b | 5c 5c 29 5b 20 09 5d 2b |([^ .,]+|\\)[ .]+|
|00001010| 5c 5c 28 5b 30 2d 39 5d | 2b 5c 5c 29 5b 20 09 5d |\\([0-9]|+\\)[ .]|
|00001020| 2b 5c 5c 28 5b 30 2d 39 | 5d 2b 3a 5b 30 2d 39 3a |+\\([0-9|]+:[0-9:|
|00001030| 5d 2b 5c 5c 29 5b 20 09 | 5d 2b 5c 5c 28 5b 2d 2b |]+\\)[ .|]+\\([-+|
|00001040| 61 2d 7a 41 2d 5a 30 2d | 39 5d 2b 5c 5c 29 5b 20 |a-zA-Z0-|9]+\\)[ |
|00001050| 09 5d 2b 5c 5c 28 5b 30 | 2d 39 5d 2b 5c 5c 29 22 |.]+\\([0|-9]+\\)"|
|00001060| 20 22 5c 5c 28 5b 30 2d | 39 5d 2b 5c 5c 29 5b 20 | "\\([0-|9]+\\)[ |
|00001070| 09 5d 2b 5c 5c 28 5b 5e | 20 09 2c 5d 2b 5c 5c 29 |.]+\\([^| .,]+\\)|
|00001080| 5b 20 09 5d 2b 5c 5c 28 | 5b 30 2d 39 5d 2b 5c 5c |[ .]+\\(|[0-9]+\\|
|00001090| 29 5b 20 09 5d 2b 5c 5c | 28 5b 30 2d 39 5d 2b 5c |)[ .]+\\|([0-9]+\|
|000010a0| 5c 29 5b 20 09 5d 2a 5c | 5c 28 5b 2d 2b 61 2d 7a |\)[ .]*\|\([-+a-z|
|000010b0| 41 2d 5a 30 2d 39 5d 2b | 5c 5c 29 22 20 22 5c 5c |A-Z0-9]+|\\)" "\\|
|000010c0| 28 5b 30 2d 39 5d 2b 5c | 5c 29 2d 5c 5c 28 5b 41 |([0-9]+\|\)-\\([A|
|000010d0| 2d 5a 61 2d 7a 5d 2b 5c | 5c 29 2d 5c 5c 28 5b 30 |-Za-z]+\|\)-\\([0|
|000010e0| 2d 39 5d 2b 5c 5c 29 5b | 20 09 5d 2b 5c 5c 28 5b |-9]+\\)[| .]+\\([|
|000010f0| 30 2d 39 5d 2b 3a 5b 30 | 2d 39 5d 2b 3a 5b 30 2d |0-9]+:[0|-9]+:[0-|
|00001100| 39 5d 2b 5c 5c 29 5c 5c | 2e 5b 30 2d 39 5d 2b 22 |9]+\\)\\|.[0-9]+"|
|00001110| 20 22 31 39 22 20 2d 32 | 20 69 6e 74 2d 74 6f 2d | "19" -2| int-to-|
|00001120| 73 74 72 69 6e 67 20 61 | 73 73 6f 63 20 74 69 6d |string a|ssoc tim|
|00001130| 65 7a 6f 6e 65 2d 6d 6f | 6e 74 68 73 2d 61 73 73 |ezone-mo|nths-ass|
|00001140| 6f 63 20 76 65 63 74 6f | 72 20 22 30 22 5d 20 37 |oc vecto|r "0"] 7|
|00001150| 20 22 5c 0a 50 61 72 73 | 65 20 44 41 54 45 20 61 | "\.Pars|e DATE a|
|00001160| 6e 64 20 72 65 74 75 72 | 6e 20 61 20 76 65 63 74 |nd retur|n a vect|
|00001170| 6f 72 20 5b 59 45 41 52 | 20 4d 4f 4e 54 48 20 44 |or [YEAR| MONTH D|
|00001180| 41 59 20 54 49 4d 45 20 | 54 49 4d 45 5a 4f 4e 45 |AY TIME |TIMEZONE|
|00001190| 5d 2e 0a 31 39 20 69 73 | 20 70 72 65 70 65 6e 64 |]..19 is| prepend|
|000011a0| 65 64 20 74 6f 20 79 65 | 61 72 20 69 66 20 6e 65 |ed to ye|ar if ne|
|000011b0| 63 65 73 73 61 72 79 2e | 20 20 54 69 6d 65 7a 6f |cessary.|  Timezo|
|000011c0| 6e 65 20 6d 61 79 20 62 | 65 20 6e 69 6c 20 69 66 |ne may b|e nil if|
|000011d0| 20 6e 6f 74 68 69 6e 67 | 2e 0a 55 6e 64 65 72 73 | nothing|..Unders|
|000011e0| 74 61 6e 64 73 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |tands th|e follow|
|000011f0| 69 6e 67 20 73 74 79 6c | 65 73 3a 0a 20 28 31 29 |ing styl|es:. (1)|
|00001200| 20 31 34 20 41 70 72 20 | 38 39 20 30 33 3a 32 30 | 14 Apr |89 03:20|
|00001210| 5b 3a 31 32 5d 20 5b 47 | 4d 54 5d 0a 20 28 32 29 |[:12] [G|MT]. (2)|
|00001220| 20 46 72 69 2c 20 31 37 | 20 4d 61 72 20 38 39 20 | Fri, 17| Mar 89 |
|00001230| 34 3a 30 31 5b 3a 33 33 | 5d 20 5b 47 4d 54 5d 0a |4:01[:33|] [GMT].|
|00001240| 20 28 33 29 20 4d 6f 6e | 20 4a 61 6e 20 31 36 20 | (3) Mon| Jan 16 |
|00001250| 31 36 3a 31 32 5b 3a 33 | 37 5d 20 5b 47 4d 54 5d |16:12[:3|7] [GMT]|
|00001260| 20 31 39 38 39 0a 20 28 | 34 29 20 36 20 4d 61 79 | 1989. (|4) 6 May|
|00001270| 20 31 39 39 32 20 31 36 | 34 31 2d 4a 53 54 20 28 | 1992 16|41-JST (|
|00001280| 57 65 64 6e 65 73 64 61 | 79 29 0a 20 28 35 29 20 |Wednesda|y). (5) |
|00001290| 32 32 2d 41 55 47 2d 31 | 39 39 33 20 31 30 3a 35 |22-AUG-1|993 10:5|
|000012a0| 39 3a 31 32 2e 38 32 22 | 5d 29 0a 28 64 65 66 61 |9:12.82"|]).(defa|
|000012b0| 6c 69 61 73 20 27 74 69 | 6d 65 7a 6f 6e 65 2d 70 |lias 'ti|mezone-p|
|000012c0| 61 72 73 65 2d 74 69 6d | 65 20 23 5b 28 74 69 6d |arse-tim|e #[(tim|
|000012d0| 65 29 20 22 08 86 05 00 | c1 c2 89 89 1b 1c 1d 18 |e) "....|........|
|000012e0| c6 c7 08 5c 22 83 1c 00 | c8 15 c9 14 ca 13 82 49 |...\"...|.......I|
|000012f0| 00 c6 cb 08 5c 22 83 2c | 00 c8 15 c9 14 c2 13 82 |....\".,|........|
|00001300| 49 00 c6 cc 08 5c 22 83 | 3c 00 c8 15 c9 14 ca 13 |I....\".|<.......|
|00001310| 82 49 00 c6 cd 08 5c 22 | 83 49 00 c8 15 c9 14 c2 |.I....\"|.I......|
|00001320| 13 ce 0d 83 57 00 08 0d | 94 0d 95 4f 82 58 00 cf |....W...|...O.X..|
|00001330| 5c 66 83 65 00 08 5c 66 | 94 5c 66 95 4f 82 66 00 |\f.e..\f|.\f.O.f.|
|00001340| cf 0b 83 73 00 08 0b 94 | 0b 95 4f 82 74 00 cf 23 |...s....|..O.t..#|
|00001350| 2c 87 22 20 5b 74 69 6d | 65 20 22 22 20 6e 69 6c |,." [tim|e "" nil|
|00001360| 20 73 65 63 6f 6e 64 20 | 6d 69 6e 75 74 65 20 68 | second |minute h|
|00001370| 6f 75 72 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |our stri|ng-match|
|00001380| 20 22 5c 5c 60 5c 5c 28 | 5b 30 2d 39 5d 2b 5c 5c | "\\`\\(|[0-9]+\\|
|00001390| 29 3a 5c 5c 28 5b 30 2d | 39 5d 2b 5c 5c 29 3a 5c |):\\([0-|9]+\\):\|
|000013a0| 5c 28 5b 30 2d 39 5d 2b | 5c 5c 29 5c 5c 27 22 20 |\([0-9]+|\\)\\'" |
|000013b0| 31 20 32 20 33 20 22 5c | 5c 60 5c 5c 28 5b 30 2d |1 2 3 "\|\`\\([0-|
|000013c0| 39 5d 2b 5c 5c 29 3a 5c | 5c 28 5b 30 2d 39 5d 2b |9]+\\):\|\([0-9]+|
|000013d0| 5c 5c 29 5c 5c 27 22 20 | 22 5c 5c 60 5c 5c 28 5b |\\)\\'" |"\\`\\([|
|000013e0| 30 2d 39 5d 5b 30 2d 39 | 5d 5c 5c 29 5c 5c 28 5b |0-9][0-9|]\\)\\([|
|000013f0| 30 2d 39 5d 5b 30 2d 39 | 5d 5c 5c 29 5c 5c 28 5b |0-9][0-9|]\\)\\([|
|00001400| 30 2d 39 5d 5b 30 2d 39 | 5d 5c 5c 29 5c 5c 27 22 |0-9][0-9|]\\)\\'"|
|00001410| 20 22 5c 5c 60 5c 5c 28 | 5b 30 2d 39 5d 5b 30 2d | "\\`\\(|[0-9][0-|
|00001420| 39 5d 5c 5c 29 5c 5c 28 | 5b 30 2d 39 5d 5b 30 2d |9]\\)\\(|[0-9][0-|
|00001430| 39 5d 5c 5c 29 5c 5c 27 | 22 20 76 65 63 74 6f 72 |9]\\)\\'|" vector|
|00001440| 20 22 30 22 5d 20 36 20 | 22 5c 0a 50 61 72 73 65 | "0"] 6 |"\.Parse|
|00001450| 20 54 49 4d 45 20 28 48 | 48 3a 4d 4d 3a 53 53 29 | TIME (H|H:MM:SS)|
|00001460| 20 61 6e 64 20 72 65 74 | 75 72 6e 20 61 20 76 65 | and ret|urn a ve|
|00001470| 63 74 6f 72 20 5b 68 6f | 75 72 20 6d 69 6e 75 74 |ctor [ho|ur minut|
|00001480| 65 20 73 65 63 6f 6e 64 | 5d 2e 0a 52 65 63 6f 67 |e second|]..Recog|
|00001490| 6e 69 7a 65 20 48 48 3a | 4d 4d 3a 53 53 2c 20 48 |nize HH:|MM:SS, H|
|000014a0| 48 3a 4d 4d 2c 20 48 48 | 4d 4d 53 53 2c 20 48 48 |H:MM, HH|MMSS, HH|
|000014b0| 4d 4d 2e 22 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |MM."]).(|defalias|
|000014c0| 20 27 74 69 6d 65 7a 6f | 6e 65 2d 7a 6f 6e 65 2d | 'timezo|ne-zone-|
|000014d0| 74 6f 2d 6d 69 6e 75 74 | 65 20 23 5b 28 74 69 6d |to-minut|e #[(tim|
|000014e0| 65 7a 6f 6e 65 29 20 22 | 08 3a 83 5c 6e 00 08 40 |ezone) "|.:.\n..@|
|000014f0| c1 a5 87 08 83 43 00 c2 | 08 96 0b 5c 22 41 86 18 |.....C..|...\"A..|
|00001500| 00 08 89 10 3b 83 5c 22 | 00 c4 08 21 10 c5 08 21 |....;.\"|...!...!|
|00001510| 89 1e 06 c7 a5 c1 5f 0e | 06 c7 a6 5c 5c 1e 08 08 |......_.|...\\...|
|00001520| c9 57 83 3f 00 0e 08 5b | 82 41 00 0e 08 2a 87 c9 |.W.?...[|.A...*..|
|00001530| 87 22 20 5b 74 69 6d 65 | 7a 6f 6e 65 20 36 30 20 |." [time|zone 60 |
|00001540| 61 73 73 6f 63 20 74 69 | 6d 65 7a 6f 6e 65 2d 77 |assoc ti|mezone-w|
|00001550| 6f 72 6c 64 2d 74 69 6d | 65 7a 6f 6e 65 73 20 73 |orld-tim|ezones s|
|00001560| 74 72 69 6e 67 2d 74 6f | 2d 69 6e 74 20 61 62 73 |tring-to|-int abs|
|00001570| 20 61 62 73 7a 6f 6e 65 | 20 31 30 30 20 6d 69 6e | abszone| 100 min|
|00001580| 75 74 65 73 20 30 5d 20 | 34 20 22 5c 0a 54 72 61 |utes 0] |4 "\.Tra|
|00001590| 6e 73 6c 61 74 65 20 54 | 49 4d 45 5a 4f 4e 45 20 |nslate T|IMEZONE |
|000015a0| 74 6f 20 61 6e 20 69 6e | 74 65 67 65 72 20 6d 69 |to an in|teger mi|
|000015b0| 6e 75 74 65 20 6f 66 66 | 73 65 74 20 66 72 6f 6d |nute off|set from|
|000015c0| 20 47 4d 54 2e 0a 54 49 | 4d 45 5a 4f 4e 45 20 63 | GMT..TI|MEZONE c|
|000015d0| 61 6e 20 62 65 20 61 20 | 63 6f 6e 73 20 63 65 6c |an be a |cons cel|
|000015e0| 6c 20 63 6f 6e 74 61 69 | 6e 69 6e 67 20 74 68 65 |l contai|ning the|
|000015f0| 20 6f 75 74 70 75 74 20 | 6f 66 20 63 75 72 72 65 | output |of curre|
|00001600| 6e 74 2d 74 69 6d 65 2d | 7a 6f 6e 65 2c 0a 6f 72 |nt-time-|zone,.or|
|00001610| 20 61 6e 20 69 6e 74 65 | 67 65 72 20 6f 66 20 74 | an inte|ger of t|
|00001620| 68 65 20 66 6f 72 6d 20 | 2b 2d 48 48 4d 4d 2c 20 |he form |+-HHMM, |
|00001630| 6f 72 20 61 20 74 69 6d | 65 20 7a 6f 6e 65 20 6e |or a tim|e zone n|
|00001640| 61 6d 65 2e 22 5d 29 0a | 28 64 65 66 61 6c 69 61 |ame."]).|(defalia|
|00001650| 73 20 27 74 69 6d 65 7a | 6f 6e 65 2d 74 69 6d 65 |s 'timez|one-time|
|00001660| 2d 66 72 6f 6d 2d 61 62 | 73 6f 6c 75 74 65 20 23 |-from-ab|solute #|
|00001670| 5b 28 64 61 74 65 20 73 | 65 63 6f 6e 64 73 29 20 |[(date s|econds) |
|00001680| 22 c0 19 5c 6e 09 5a 1b | c4 c5 21 1e 06 0e 07 0b |"..\n.Z.|..!.....|
|00001690| 0e 06 5f 5c 5c 1e 07 c4 | c8 21 1e 09 ca 0e 07 0e |.._\\...|.!......|
|000016a0| 09 a5 21 89 1e 0b 0e 09 | 5f 1e 5c 66 ca 0e 07 0e |..!.....|_.\f....|
|000016b0| 5c 66 5a 21 1e 0d ce 0e | 07 0e 5c 66 0e 0d 5c 5c |\fZ!....|..\f..\\|
|000016c0| 5a 21 cf 57 85 45 00 0e | 0b 0e 0d 42 2e 08 87 22 |Z!.W.E..|...B..."|
|000016d0| 20 5b 37 31 39 31 36 32 | 20 63 75 72 72 65 6e 74 | [719162| current|
|000016e0| 2d 74 69 6d 65 2d 6f 72 | 69 67 69 6e 20 64 61 74 |-time-or|igin dat|
|000016f0| 65 20 64 61 79 73 20 66 | 6c 6f 61 74 20 38 36 34 |e days f|loat 864|
|00001700| 30 30 20 73 65 63 6f 6e | 64 73 2d 70 65 72 2d 64 |00 secon|ds-per-d|
|00001710| 61 79 20 73 65 63 6f 6e | 64 73 20 36 35 35 33 36 |ay secon|ds 65536|
|00001720| 20 63 75 72 72 65 6e 74 | 2d 74 69 6d 65 2d 61 72 | current|-time-ar|
|00001730| 69 74 68 6d 65 74 69 63 | 2d 62 61 73 65 20 66 6c |ithmetic|-base fl|
|00001740| 6f 6f 72 20 68 69 20 68 | 69 62 61 73 65 20 6c 6f |oor hi h|ibase lo|
|00001750| 20 61 62 73 20 32 5d 20 | 35 20 22 5c 0a 43 6f 6d | abs 2] |5 "\.Com|
|00001760| 70 75 74 65 20 74 68 65 | 20 55 54 43 20 74 69 6d |pute the| UTC tim|
|00001770| 65 20 65 71 75 69 76 61 | 6c 65 6e 74 20 74 6f 20 |e equiva|lent to |
|00001780| 44 41 54 45 20 61 74 20 | 74 69 6d 65 20 53 45 43 |DATE at |time SEC|
|00001790| 4f 4e 44 53 20 61 66 74 | 65 72 20 6d 69 64 6e 69 |ONDS aft|er midni|
|000017a0| 67 68 74 2e 0a 52 65 74 | 75 72 6e 20 61 20 6c 69 |ght..Ret|urn a li|
|000017b0| 73 74 20 73 75 69 74 61 | 62 6c 65 20 61 73 20 61 |st suita|ble as a|
|000017c0| 6e 20 61 72 67 75 6d 65 | 6e 74 20 74 6f 20 63 75 |n argume|nt to cu|
|000017d0| 72 72 65 6e 74 2d 74 69 | 6d 65 2d 7a 6f 6e 65 2c |rrent-ti|me-zone,|
|000017e0| 0a 6f 72 20 6e 69 6c 20 | 69 66 20 74 68 65 20 64 |.or nil |if the d|
|000017f0| 61 74 65 20 63 61 6e 6e | 6f 74 20 62 65 20 74 68 |ate cann|ot be th|
|00001800| 75 73 20 72 65 70 72 65 | 73 65 6e 74 65 64 2e 0a |us repre|sented..|
|00001810| 44 41 54 45 20 69 73 20 | 74 68 65 20 6e 75 6d 62 |DATE is |the numb|
|00001820| 65 72 20 6f 66 20 64 61 | 79 73 20 65 6c 61 70 73 |er of da|ys elaps|
|00001830| 65 64 20 73 69 6e 63 65 | 20 74 68 65 20 28 69 6d |ed since| the (im|
|00001840| 61 67 69 6e 61 72 79 29 | 0a 47 72 65 67 6f 72 69 |aginary)|.Gregori|
|00001850| 61 6e 20 64 61 74 65 20 | 53 75 6e 64 61 79 2c 20 |an date |Sunday, |
|00001860| 44 65 63 65 6d 62 65 72 | 20 33 31 2c 20 31 20 42 |December| 31, 1 B|
|00001870| 43 2e 22 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |C."]).(d|efalias |
|00001880| 27 74 69 6d 65 7a 6f 6e | 65 2d 74 69 6d 65 2d 7a |'timezon|e-time-z|
|00001890| 6f 6e 65 2d 66 72 6f 6d | 2d 61 62 73 6f 6c 75 74 |one-from|-absolut|
|000018a0| 65 20 23 5b 28 64 61 74 | 65 20 73 65 63 6f 6e 64 |e #[(dat|e second|
|000018b0| 73 29 20 22 c0 c1 21 85 | 1d 00 c2 0b 5c 66 5c 22 |s) "..!.|....\f\"|
|000018c0| 89 1d 85 1c 00 c1 0d 21 | 89 1e 06 40 85 1b 00 0e |.......!|...@....|
|000018d0| 06 29 29 87 22 20 5b 66 | 62 6f 75 6e 64 70 20 63 |.))." [f|boundp c|
|000018e0| 75 72 72 65 6e 74 2d 74 | 69 6d 65 2d 7a 6f 6e 65 |urrent-t|ime-zone|
|000018f0| 20 74 69 6d 65 7a 6f 6e | 65 2d 74 69 6d 65 2d 66 | timezon|e-time-f|
|00001900| 72 6f 6d 2d 61 62 73 6f | 6c 75 74 65 20 64 61 74 |rom-abso|lute dat|
|00001910| 65 20 73 65 63 6f 6e 64 | 73 20 75 74 63 2d 74 69 |e second|s utc-ti|
|00001920| 6d 65 20 7a 6f 6e 65 5d | 20 34 20 22 5c 0a 43 6f |me zone]| 4 "\.Co|
|00001930| 6d 70 75 74 65 20 74 68 | 65 20 6c 6f 63 61 6c 20 |mpute th|e local |
|00001940| 74 69 6d 65 20 7a 6f 6e | 65 20 66 6f 72 20 44 41 |time zon|e for DA|
|00001950| 54 45 20 61 74 20 74 69 | 6d 65 20 53 45 43 4f 4e |TE at ti|me SECON|
|00001960| 44 53 20 61 66 74 65 72 | 20 6d 69 64 6e 69 67 68 |DS after| midnigh|
|00001970| 74 2e 0a 52 65 74 75 72 | 6e 20 61 20 6c 69 73 74 |t..Retur|n a list|
|00001980| 20 69 6e 20 74 68 65 20 | 73 61 6d 65 20 66 6f 72 | in the |same for|
|00001990| 6d 61 74 20 61 73 20 63 | 75 72 72 65 6e 74 2d 74 |mat as c|urrent-t|
|000019a0| 69 6d 65 2d 7a 6f 6e 65 | 27 73 20 72 65 73 75 6c |ime-zone|'s resul|
|000019b0| 74 2c 0a 6f 72 20 6e 69 | 6c 20 69 66 20 74 68 65 |t,.or ni|l if the|
|000019c0| 20 6c 6f 63 61 6c 20 74 | 69 6d 65 20 7a 6f 6e 65 | local t|ime zone|
|000019d0| 20 63 6f 75 6c 64 20 6e | 6f 74 20 62 65 20 63 6f | could n|ot be co|
|000019e0| 6d 70 75 74 65 64 2e 0a | 44 41 54 45 20 69 73 20 |mputed..|DATE is |
|000019f0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 64 61 |the numb|er of da|
|00001a00| 79 73 20 65 6c 61 70 73 | 65 64 20 73 69 6e 63 65 |ys elaps|ed since|
|00001a10| 20 74 68 65 20 28 69 6d | 61 67 69 6e 61 72 79 29 | the (im|aginary)|
|00001a20| 0a 47 72 65 67 6f 72 69 | 61 6e 20 64 61 74 65 20 |.Gregori|an date |
|00001a30| 53 75 6e 64 61 79 2c 20 | 44 65 63 65 6d 62 65 72 |Sunday, |December|
|00001a40| 20 33 31 2c 20 31 20 42 | 43 2e 22 5d 29 0a 28 64 | 31, 1 B|C."]).(d|
|00001a50| 65 66 61 6c 69 61 73 20 | 27 74 69 6d 65 7a 6f 6e |efalias |'timezon|
|00001a60| 65 2d 66 69 78 2d 74 69 | 6d 65 20 23 5b 28 64 61 |e-fix-ti|me #[(da|
|00001a70| 74 65 20 6c 6f 63 61 6c | 20 74 69 6d 65 7a 6f 6e |te local| timezon|
|00001a80| 65 29 20 22 c0 09 21 19 | c2 09 c3 48 21 89 1c c5 |e) "..!.|...H!...|
|00001a90| 57 83 16 00 5c 66 c6 5c | 5c 82 17 00 5c 66 1c c2 |W...\f.\|\...\f..|
|00001aa0| 09 c7 48 21 1e 08 c2 09 | c9 48 21 1e 5c 6e cb 09 |..H!....|.H!.\n..|
|00001ab0| cc 48 21 1e 0d c2 0e 0d | c3 48 21 1e 0e c2 0e 0d |.H!.....|.H!.....|
|00001ac0| c7 48 21 1e 0f c2 0e 0d | c9 48 21 1e 10 09 d1 48 |.H!.....|.H!....H|
|00001ad0| 86 4d 00 0e 12 1e 12 0e | 13 86 69 00 d4 d5 0e 08 |.M......|..i.....|
|00001ae0| 0e 5c 6e 5c 66 23 0e 10 | 0e 0f 0e 0e d6 5f 5c 5c |.\n\f#..|....._\\|
|00001af0| d6 5f 5c 5c 5c 22 1e 13 | d7 0e 13 21 d7 0e 12 21 |._\\\"..|...!...!|
|00001b00| 5a 1e 18 0e 0f 0e 18 5c | 5c 1e 0f d9 0e 0f d6 5c |Z......\|\......\|
|00001b10| 22 1e 1a 0e 0e 0e 1a 5c | 5c 16 0e 0e 0f 0e 1a d6 |"......\|\.......|
|00001b20| 5f 5a 16 0f db 0e 0e 58 | 83 c9 00 0e 0e db 5a 16 |_Z.....X|......Z.|
|00001b30| 0e 0e 5c 6e 54 16 5c 6e | dc 0e 08 5c 66 5c 22 0e |..\nT.\n|...\f\".|
|00001b40| 5c 6e 57 83 fb 00 0e 08 | 54 16 08 c7 16 5c 6e dd |\nW.....|T....\n.|
|00001b50| 0e 08 57 83 fb 00 c7 16 | 08 5c 66 54 14 82 fb 00 |..W.....|.\fT....|
|00001b60| c3 0e 0e 56 83 fb 00 0e | 0e db 5c 5c 16 0e 0e 5c |...V....|..\\...\|
|00001b70| 6e 53 16 5c 6e c7 0e 5c | 6e 56 83 fb 00 0e 08 53 |nS.\n..\|nV.....S|
|00001b80| 16 08 c7 0e 08 56 83 f4 | 00 dd 16 08 5c 66 53 14 |.....V..|....\fS.|
|00001b90| dc 0e 08 5c 66 5c 22 16 | 5c 6e de 5c 66 0e 08 0e |...\f\".|\n.\f...|
|00001ba0| 5c 6e 0e 0e 0e 0f 0e 10 | 0e 13 26 07 2e 0e 87 22 |\n......|..&...."|
|00001bb0| 20 5b 74 69 6d 65 7a 6f | 6e 65 2d 70 61 72 73 65 | [timezo|ne-parse|
|00001bc0| 2d 64 61 74 65 20 64 61 | 74 65 20 73 74 72 69 6e |-date da|te strin|
|00001bd0| 67 2d 74 6f 2d 69 6e 74 | 20 30 20 79 65 61 72 20 |g-to-int| 0 year |
|00001be0| 31 30 30 20 31 39 30 30 | 20 31 20 6d 6f 6e 74 68 |100 1900| 1 month|
|00001bf0| 20 32 20 64 61 79 20 74 | 69 6d 65 7a 6f 6e 65 2d | 2 day t|imezone-|
|00001c00| 70 61 72 73 65 2d 74 69 | 6d 65 20 33 20 74 69 6d |parse-ti|me 3 tim|
|00001c10| 65 20 68 6f 75 72 20 6d | 69 6e 75 74 65 20 73 65 |e hour m|inute se|
|00001c20| 63 6f 6e 64 20 34 20 6c | 6f 63 61 6c 20 74 69 6d |cond 4 l|ocal tim|
|00001c30| 65 7a 6f 6e 65 20 74 69 | 6d 65 7a 6f 6e 65 2d 74 |ezone ti|mezone-t|
|00001c40| 69 6d 65 2d 7a 6f 6e 65 | 2d 66 72 6f 6d 2d 61 62 |ime-zone|-from-ab|
|00001c50| 73 6f 6c 75 74 65 20 74 | 69 6d 65 7a 6f 6e 65 2d |solute t|imezone-|
|00001c60| 61 62 73 6f 6c 75 74 65 | 2d 66 72 6f 6d 2d 67 72 |absolute|-from-gr|
|00001c70| 65 67 6f 72 69 61 6e 20 | 36 30 20 74 69 6d 65 7a |egorian |60 timez|
|00001c80| 6f 6e 65 2d 7a 6f 6e 65 | 2d 74 6f 2d 6d 69 6e 75 |one-zone|-to-minu|
|00001c90| 74 65 20 64 69 66 66 20 | 66 6c 6f 6f 72 20 68 6f |te diff |floor ho|
|00001ca0| 75 72 2d 66 69 78 20 32 | 34 20 74 69 6d 65 7a 6f |ur-fix 2|4 timezo|
|00001cb0| 6e 65 2d 6c 61 73 74 2d | 64 61 79 2d 6f 66 2d 6d |ne-last-|day-of-m|
|00001cc0| 6f 6e 74 68 20 31 32 20 | 76 65 63 74 6f 72 5d 20 |onth 12 |vector] |
|00001cd0| 39 20 22 5c 0a 43 6f 6e | 76 65 72 74 20 44 41 54 |9 "\.Con|vert DAT|
|00001ce0| 45 20 28 64 65 66 61 75 | 6c 74 20 74 69 6d 65 7a |E (defau|lt timez|
|00001cf0| 6f 6e 65 20 4c 4f 43 41 | 4c 29 20 74 6f 20 59 59 |one LOCA|L) to YY|
|00001d00| 59 59 2d 4d 4d 2d 44 44 | 2d 48 48 2d 4d 4d 2d 53 |YY-MM-DD|-HH-MM-S|
|00001d10| 53 2d 5a 4f 4e 45 20 76 | 65 63 74 6f 72 2e 0a 49 |S-ZONE v|ector..I|
|00001d20| 66 20 4c 4f 43 41 4c 20 | 69 73 20 6e 69 6c 2c 20 |f LOCAL |is nil, |
|00001d30| 69 74 20 69 73 20 61 73 | 73 75 6d 65 64 20 74 6f |it is as|sumed to|
|00001d40| 20 62 65 20 47 4d 54 2e | 0a 49 66 20 54 49 4d 45 | be GMT.|.If TIME|
|00001d50| 5a 4f 4e 45 20 69 73 20 | 6e 69 6c 2c 20 75 73 65 |ZONE is |nil, use|
|00001d60| 20 74 68 65 20 6c 6f 63 | 61 6c 20 74 69 6d 65 20 | the loc|al time |
|00001d70| 7a 6f 6e 65 2e 22 5d 29 | 0a 28 64 65 66 61 6c 69 |zone."])|.(defali|
|00001d80| 61 73 20 27 74 69 6d 65 | 7a 6f 6e 65 2d 6c 61 73 |as 'time|zone-las|
|00001d90| 74 2d 64 61 79 2d 6f 66 | 2d 6d 6f 6e 74 68 20 23 |t-day-of|-month #|
|00001da0| 5b 28 6d 6f 6e 74 68 20 | 79 65 61 72 29 20 22 08 |[(month |year) ".|
|00001db0| c1 55 83 0e 00 c2 0b 21 | 83 0e 00 c4 87 c5 08 53 |.U.....!|.......S|
|00001dc0| 48 87 22 20 5b 6d 6f 6e | 74 68 20 32 20 74 69 6d |H." [mon|th 2 tim|
|00001dd0| 65 7a 6f 6e 65 2d 6c 65 | 61 70 2d 79 65 61 72 2d |ezone-le|ap-year-|
|00001de0| 70 20 79 65 61 72 20 32 | 39 20 5b 33 31 20 32 38 |p year 2|9 [31 28|
|00001df0| 20 33 31 20 33 30 20 33 | 31 20 33 30 20 33 31 20 | 31 30 3|1 30 31 |
|00001e00| 33 31 20 33 30 20 33 31 | 20 33 30 20 33 31 5d 5d |31 30 31| 30 31]]|
|00001e10| 20 32 20 22 5c 0a 54 68 | 65 20 6c 61 73 74 20 64 | 2 "\.Th|e last d|
|00001e20| 61 79 20 69 6e 20 4d 4f | 4e 54 48 20 64 75 72 69 |ay in MO|NTH duri|
|00001e30| 6e 67 20 59 45 41 52 2e | 22 5d 29 0a 28 64 65 66 |ng YEAR.|"]).(def|
|00001e40| 61 6c 69 61 73 20 27 74 | 69 6d 65 7a 6f 6e 65 2d |alias 't|imezone-|
|00001e50| 6c 65 61 70 2d 79 65 61 | 72 2d 70 20 23 5b 28 79 |leap-yea|r-p #[(y|
|00001e60| 65 61 72 29 20 22 08 c1 | a6 c2 55 83 11 00 08 c3 |ear) "..|..U.....|
|00001e70| a6 c2 55 3f 86 16 00 08 | c4 a6 c2 55 87 22 20 5b |..U?....|...U." [|
|00001e80| 79 65 61 72 20 34 20 30 | 20 31 30 30 20 34 30 30 |year 4 0| 100 400|
|00001e90| 5d 20 32 20 22 5c 0a 52 | 65 74 75 72 6e 73 20 74 |] 2 "\.R|eturns t|
|00001ea0| 20 69 66 20 59 45 41 52 | 20 69 73 20 61 20 47 72 | if YEAR| is a Gr|
|00001eb0| 65 67 6f 72 69 61 6e 20 | 6c 65 61 70 20 79 65 61 |egorian |leap yea|
|00001ec0| 72 2e 22 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |r."]).(d|efalias |
|00001ed0| 27 74 69 6d 65 7a 6f 6e | 65 2d 64 61 79 2d 6e 75 |'timezon|e-day-nu|
|00001ee0| 6d 62 65 72 20 23 5b 28 | 6d 6f 6e 74 68 20 64 61 |mber #[(|month da|
|00001ef0| 79 20 79 65 61 72 29 20 | 22 08 09 53 c2 5f 5c 5c |y year) |"..S._\\|
|00001f00| 1b 09 c4 56 83 21 00 0b | 09 c5 5f c6 5c 5c c7 a5 |...V.!..|.._.\\..|
|00001f10| 5a 13 c8 0e 09 21 83 21 | 00 0b 54 13 0b 29 87 22 |Z....!.!|..T..)."|
|00001f20| 20 5b 64 61 79 20 6d 6f | 6e 74 68 20 33 31 20 64 | [day mo|nth 31 d|
|00001f30| 61 79 2d 6f 66 2d 79 65 | 61 72 20 32 20 34 20 32 |ay-of-ye|ar 2 4 2|
|00001f40| 33 20 31 30 20 74 69 6d | 65 7a 6f 6e 65 2d 6c 65 |3 10 tim|ezone-le|
|00001f50| 61 70 2d 79 65 61 72 2d | 70 20 79 65 61 72 5d 20 |ap-year-|p year] |
|00001f60| 33 20 22 5c 0a 52 65 74 | 75 72 6e 20 74 68 65 20 |3 "\.Ret|urn the |
|00001f70| 64 61 79 20 6e 75 6d 62 | 65 72 20 77 69 74 68 69 |day numb|er withi|
|00001f80| 6e 20 74 68 65 20 79 65 | 61 72 20 6f 66 20 74 68 |n the ye|ar of th|
|00001f90| 65 20 64 61 74 65 20 6d | 6f 6e 74 68 2f 64 61 79 |e date m|onth/day|
|00001fa0| 2f 79 65 61 72 2e 22 5d | 29 0a 28 64 65 66 61 6c |/year."]|).(defal|
|00001fb0| 69 61 73 20 27 74 69 6d | 65 7a 6f 6e 65 2d 61 62 |ias 'tim|ezone-ab|
|00001fc0| 73 6f 6c 75 74 65 2d 66 | 72 6f 6d 2d 67 72 65 67 |solute-f|rom-greg|
|00001fd0| 6f 72 69 61 6e 20 23 5b | 28 6d 6f 6e 74 68 20 64 |orian #[|(month d|
|00001fe0| 61 79 20 79 65 61 72 29 | 20 22 c0 09 5c 6e 0b 23 |ay year)| "..\n.#|
|00001ff0| 0b 53 c4 5f 0b 53 c5 a5 | 0b 53 c6 a5 5b 0b 53 c7 |.S._.S..|.S..[.S.|
|00002000| a5 5c 5c 5c 5c 5c 5c 5c | 5c 87 22 20 5b 74 69 6d |.\\\\\\\|\." [tim|
|00002010| 65 7a 6f 6e 65 2d 64 61 | 79 2d 6e 75 6d 62 65 72 |ezone-da|y-number|
|00002020| 20 6d 6f 6e 74 68 20 64 | 61 79 20 79 65 61 72 20 | month d|ay year |
|00002030| 33 36 35 20 34 20 31 30 | 30 20 34 30 30 5d 20 36 |365 4 10|0 400] 6|
|00002040| 20 22 5c 0a 54 68 65 20 | 6e 75 6d 62 65 72 20 6f | "\.The |number o|
|00002050| 66 20 64 61 79 73 20 62 | 65 74 77 65 65 6e 20 74 |f days b|etween t|
|00002060| 68 65 20 47 72 65 67 6f | 72 69 61 6e 20 64 61 74 |he Grego|rian dat|
|00002070| 65 20 31 32 2f 33 31 2f | 31 20 42 43 20 61 6e 64 |e 12/31/|1 BC and|
|00002080| 20 6d 6f 6e 74 68 2f 64 | 61 79 2f 79 65 61 72 2e | month/d|ay/year.|
|00002090| 0a 54 68 65 20 47 72 65 | 67 6f 72 69 61 6e 20 64 |.The Gre|gorian d|
|000020a0| 61 74 65 20 53 75 6e 64 | 61 79 2c 20 44 65 63 65 |ate Sund|ay, Dece|
|000020b0| 6d 62 65 72 20 33 31 2c | 20 31 20 42 43 20 69 73 |mber 31,| 1 BC is|
|000020c0| 20 69 6d 61 67 69 6e 61 | 72 79 2e 22 5d 29 0a    | imagina|ry."]). |
+--------+-------------------------+-------------------------+--------+--------+